object Form17: TForm17 Left = 249 Top = 130 BorderStyle = bsNone Caption = 'Kiral�k Emlak Giri�i' ClientHeight = 480 ClientWidth = 640 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 0 Top = 0 Width = 640 Height = 480 AutoSize = True Picture.Data = {} OnMouseDown = Image1MouseDown end object Label1: TLabel Left = 40 Top = 104 Width = 24 Height = 13 Caption = 'Semt' Transparent = True end object Label3: TLabel Left = 240 Top = 248 Width = 38 Height = 13 Caption = 'Asans�r' Transparent = True end object Label4: TLabel Left = 40 Top = 176 Width = 37 Height = 13 Caption = 'Hidrofor' Transparent = True end object Label5: TLabel Left = 40 Top = 200 Width = 40 Height = 13 Caption = 'Zeminler' Transparent = True end object Label6: TLabel Left = 40 Top = 224 Width = 32 Height = 13 Caption = 'Kap�lar' Transparent = True end object Label7: TLabel Left = 40 Top = 248 Width = 33 Height = 13 Caption = 'Mutfak' Transparent = True end object Label8: TLabel Left = 40 Top = 272 Width = 16 Height = 13 Caption = 'Kat' Transparent = True end object Label9: TLabel Left = 40 Top = 296 Width = 42 Height = 13 Caption = 'Depozito' Transparent = True end object Label10: TLabel Left = 240 Top = 296 Width = 20 Height = 13 Caption = 'Oda' Transparent = True end object Label11: TLabel Left = 40 Top = 328 Width = 27 Height = 13 Caption = 'Adres' Transparent = True end object Label12: TLabel Left = 40 Top = 352 Width = 43 Height = 13 Caption = 'A��klama' Transparent = True end object Label13: TLabel Left = 240 Top = 104 Width = 25 Height = 13 Caption = 'Kiras�' Transparent = True end object Label14: TLabel Left = 240 Top = 128 Width = 46 Height = 13 Caption = 'Is� Sistemi' Transparent = True end object Label15: TLabel Left = 240 Top = 152 Width = 38 Height = 13 Caption = 'Otopark' Transparent = True end object Label16: TLabel Left = 240 Top = 176 Width = 40 Height = 13 Caption = 'Duvarlar' Transparent = True end object Image2: TImage Left = 40 Top = 148 Width = 13 Height = 15 AutoSize = True Picture.Data = {} Transparent = True end object Label17: TLabel Left = 240 Top = 200 Width = 31 Height = 13 Caption = 'Tavan' Transparent = True end object Label18: TLabel Left = 240 Top = 224 Width = 30 Height = 13 Caption = 'Banyo' Transparent = True end object Label19: TLabel Left = 40 Top = 128 Width = 29 Height = 13 Caption = 'Emlak' Transparent = True end object Label20: TLabel Left = 240 Top = 272 Width = 52 Height = 13 Caption = 'Kay�t Tarihi' Transparent = True end object Label21: TLabel Left = 440 Top = 104 Width = 18 Height = 13 Caption = '�sim' Transparent = True end object Label22: TLabel Left = 440 Top = 128 Width = 15 Height = 13 Caption = 'Tel' Transparent = True end object Label23: TLabel Left = 440 Top = 152 Width = 26 Height = 13 Caption = '�� Tel' Transparent = True end object Label24: TLabel Left = 440 Top = 176 Width = 37 Height = 13 Caption = 'Cep Tel' Transparent = True end object Label25: TLabel Left = 440 Top = 200 Width = 37 Height = 13 Caption = 'Anahtar' Transparent = True end object Label26: TLabel Left = 440 Top = 224 Width = 31 Height = 13 Caption = 'Durum' Transparent = True end object Image3: TImage Left = 72 Top = 408 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Image6: TImage Left = 248 Top = 408 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Image7: TImage Left = 416 Top = 408 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Label2: TLabel Left = 80 Top = 416 Width = 137 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Liste' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label2MouseDown OnMouseUp = Label2MouseUp end object Label27: TLabel Left = 256 Top = 416 Width = 137 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Yazd�r' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label27MouseDown OnMouseUp = Label27MouseUp end object Label28: TLabel Left = 424 Top = 416 Width = 137 Height = 25 Alignment = taCenter AutoSize = False Caption = '��k��' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label28MouseDown OnMouseUp = Label28MouseUp end object Image4: TImage Left = 544 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} OnMouseDown = Image4MouseDown OnMouseUp = Image4MouseUp end object Image5: TImage Left = 576 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} OnMouseDown = Image5MouseDown OnMouseUp = Image5MouseUp end object Image8: TImage Left = 544 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} Visible = False end object Image9: TImage Left = 576 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} Visible = False end object Image11: TImage Left = 448 Top = 277 Width = 149 Height = 34 AutoSize = True Picture.Data = {} end object Image12: TImage Left = 448 Top = 275 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Label29: TLabel Left = 456 Top = 288 Width = 137 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Emlak Sahibini G�ster' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True OnMouseDown = Label29MouseDown OnMouseUp = Label29MouseUp end object DBEdit1: TDBEdit Left = 96 Top = 144 Width = 121 Height = 21 DataField = 'Metre2' DataSource = DataSource1 TabOrder = 2 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit4: TDBEdit Left = 96 Top = 192 Width = 121 Height = 21 DataField = 'Zeminler' DataSource = DataSource1 TabOrder = 4 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit5: TDBEdit Left = 96 Top = 216 Width = 121 Height = 21 DataField = 'Kapilar' DataSource = DataSource1 TabOrder = 5 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit6: TDBEdit Left = 96 Top = 240 Width = 121 Height = 21 DataField = 'Mutfak' DataSource = DataSource1 TabOrder = 6 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit7: TDBEdit Left = 96 Top = 264 Width = 121 Height = 21 DataField = 'Kat' DataSource = DataSource1 TabOrder = 7 OnKeyPress = DBLookupComboBox1KeyPress end object DBNavigator1: TDBNavigator Left = 40 Top = 72 Width = 570 Height = 18 DataSource = DataSource1 Hints.Strings = ( '�lk Kay�t' '�nceki Kay�t' 'Sonraki Kay�t' 'Son Kay�t' 'Kay�t Ekle' 'Kay�t Sil' 'De�i�iklik' 'Onayla' 'De�i�iklik �ptal' 'Yenile') ParentShowHint = False ShowHint = True TabOrder = 26 end object DBEdit8: TDBEdit Left = 296 Top = 96 Width = 121 Height = 21 DataField = 'Fiyati' DataSource = DataSource1 TabOrder = 9 OnKeyPress = DBLookupComboBox1KeyPress end object DBMemo1: TDBMemo Left = 96 Top = 352 Width = 513 Height = 41 DataField = 'Notlar' DataSource = DataSource1 TabOrder = 25 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit11: TDBEdit Left = 96 Top = 288 Width = 121 Height = 21 DataField = 'Depozito' DataSource = DataSource1 TabOrder = 8 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit12: TDBEdit Left = 296 Top = 288 Width = 121 Height = 21 DataField = 'Oda' DataSource = DataSource1 TabOrder = 17 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit14: TDBEdit Left = 296 Top = 168 Width = 121 Height = 21 DataField = 'Duvarlar' DataSource = DataSource1 TabOrder = 12 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit15: TDBEdit Left = 296 Top = 192 Width = 121 Height = 21 DataField = 'Tavanlar' DataSource = DataSource1 TabOrder = 13 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit16: TDBEdit Left = 296 Top = 216 Width = 121 Height = 21 DataField = 'Banyo' DataSource = DataSource1 TabOrder = 14 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit18: TDBEdit Left = 296 Top = 264 Width = 121 Height = 21 DataField = 'Satis' DataSource = DataSource1 TabOrder = 16 OnEnter = DBEdit18Enter OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit19: TDBEdit Left = 488 Top = 96 Width = 121 Height = 21 DataField = 'Isim' DataSource = DataSource1 TabOrder = 18 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit20: TDBEdit Left = 488 Top = 120 Width = 121 Height = 21 DataField = 'Telefon' DataSource = DataSource1 MaxLength = 15 TabOrder = 19 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit21: TDBEdit Left = 488 Top = 144 Width = 121 Height = 21 DataField = 'Istel' DataSource = DataSource1 MaxLength = 15 TabOrder = 20 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit22: TDBEdit Left = 488 Top = 168 Width = 121 Height = 21 DataField = 'Ceptel' DataSource = DataSource1 MaxLength = 15 TabOrder = 21 OnKeyPress = DBLookupComboBox1KeyPress end object DBEdit23: TDBEdit Left = 488 Top = 192 Width = 121 Height = 21 DataField = 'Anahtar' DataSource = DataSource1 TabOrder = 22 OnKeyPress = DBLookupComboBox1KeyPress end object DBMemo2: TDBMemo Left = 96 Top = 320 Width = 513 Height = 25 DataField = 'Adres' DataSource = DataSource1 TabOrder = 24 OnKeyPress = DBLookupComboBox1KeyPress end object DBLookupComboBox1: TDBLookupComboBox Left = 96 Top = 96 Width = 121 Height = 21 DataField = 'Semtadi' DataSource = DataSource1 KeyField = 'Semtler' ListField = 'Semtler' ListSource = DataSource2 TabOrder = 0 OnKeyPress = DBLookupComboBox1KeyPress end object DBLookupComboBox2: TDBLookupComboBox Left = 96 Top = 120 Width = 121 Height = 21 DataField = 'Emlak' DataSource = DataSource1 KeyField = 'EmlakTipi' ListField = 'EmlakTipi' ListSource = DataSource3 TabOrder = 1 OnKeyPress = DBLookupComboBox1KeyPress end object DBComboBox1: TDBComboBox Left = 488 Top = 216 Width = 121 Height = 21 DataField = 'Durum' DataSource = DataSource1 ItemHeight = 13 Items.Strings = ( 'Kiraland�' 'Kiralanmad�') TabOrder = 23 OnKeyPress = DBLookupComboBox1KeyPress end object DBComboBox2: TDBComboBox Left = 96 Top = 168 Width = 121 Height = 21 DataField = 'Hidrofor' DataSource = DataSource1 ItemHeight = 13 Items.Strings = ( 'Var' 'Yok') TabOrder = 3 OnKeyPress = DBLookupComboBox1KeyPress end object DBComboBox3: TDBComboBox Left = 296 Top = 240 Width = 121 Height = 21 DataField = 'Asansor' DataSource = DataSource1 ItemHeight = 13 Items.Strings = ( 'Var' 'Yok') TabOrder = 15 OnKeyPress = DBLookupComboBox1KeyPress end object DBComboBox4: TDBComboBox Left = 296 Top = 144 Width = 121 Height = 21 DataField = 'Otopark' DataSource = DataSource1 ItemHeight = 13 Items.Strings = ( 'Var' 'Yok') TabOrder = 11 OnKeyPress = DBLookupComboBox1KeyPress end object Panel1: TPanel Left = 440 Top = 96 Width = 170 Height = 170 BevelOuter = bvNone Caption = 'Panel1' TabOrder = 27 object Image10: TImage Left = 0 Top = 0 Width = 170 Height = 170 AutoSize = True Picture.Data = {} end end object DBComboBox5: TDBComboBox Left = 296 Top = 120 Width = 121 Height = 21 DataField = 'Isisistemi' DataSource = DataSource1 ItemHeight = 13 Items.Strings = ( 'Sobal�' 'Do�al Gaz Kaloriferli' 'Do�al Gaz Sobal�' 'Kalofiferli') TabOrder = 10 OnKeyPress = DBLookupComboBox1KeyPress end object DataSource1: TDataSource DataSet = Table1 Left = 56 Top = 8 end object Table1: TTable Active = True AfterPost = Table1AfterPost TableName = 'kegiris' Left = 88 Top = 16 object Table1No: TAutoIncField FieldName = 'No' ReadOnly = True end object Table1Metre2: TFloatField FieldName = 'Metre2' end object Table1Asansor: TStringField FieldName = 'Asansor' Size = 10 end object Table1Hidrofor: TStringField FieldName = 'Hidrofor' Size = 10 end object Table1Zeminler: TStringField FieldName = 'Zeminler' Size = 15 end object Table1Kapilar: TStringField FieldName = 'Kapilar' Size = 15 end object Table1Mutfak: TStringField FieldName = 'Mutfak' Size = 15 end object Table1Kat: TStringField FieldName = 'Kat' Size = 6 end object Table1Notlar: TMemoField FieldName = 'Notlar' BlobType = ftMemo Size = 100 end object Table1Adres: TMemoField FieldName = 'Adres' BlobType = ftMemo Size = 50 end object Table1Isim: TStringField FieldName = 'Isim' end object Table1Istel: TStringField FieldName = 'Istel' EditMask = '!\(999\) 999-99-99;1;_' end object Table1Anahtar: TStringField FieldName = 'Anahtar' end object Table1Fiyati: TCurrencyField FieldName = 'Fiyati' end object Table1Oda: TStringField FieldName = 'Oda' end object Table1Isisistemi: TStringField FieldName = 'Isisistemi' end object Table1Otopark: TStringField FieldName = 'Otopark' end object Table1Duvarlar: TStringField FieldName = 'Duvarlar' end object Table1Tavanlar: TStringField FieldName = 'Tavanlar' end object Table1Banyo: TStringField FieldName = 'Banyo' end object Table1Emlak: TStringField FieldName = 'Emlak' end object Table1Satis: TStringField FieldName = 'Satis' Size = 15 end object Table1Telefon: TStringField FieldName = 'Telefon' EditMask = '!\(999\) 999-99-99;1;_' end object Table1Ceptel: TStringField FieldName = 'Ceptel' EditMask = '!\(999\) 999-99-99;1;_' end object Table1Durum: TStringField FieldName = 'Durum' end object Table1Semtadi: TStringField FieldName = 'Semtadi' end object Table1Depozito: TStringField FieldName = 'Depozito' Size = 10 end end object DataSource2: TDataSource DataSet = Table2 Left = 208 Top = 8 end object Table2: TTable Active = True TableName = 'semtler.db' Left = 272 Top = 8 end object DataSource3: TDataSource DataSet = Table3 Left = 352 Top = 16 end object Table3: TTable Active = True TableName = 'emlaktanimlama.db' Left = 400 Top = 24 end end